home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Interactive Media Design Review 1999
/
Interactive Media Design Review 1999.iso
/
pc
/
Demos
/
Herois
/
Codigo.Cst
/
00039_Script_UniversosVaiFilme
< prev
next >
Wrap
Text File
|
1999-03-19
|
770b
|
37 lines
property frameFilme
on getBehaivorDescription
return "Pause na saida do frame, chamando #idleSprite para todos sprites durante #idle"
end
on getPropertyDescriptionList
set p_list = [ ¼
#frameFilme: [ #comment: "Frame do filme", ¼
#format: #string, ¼
#default: "" ] ¼
]
return p_list
end
on mouseUp
cursor 4
global gPronde, gDonde
set gDonde = 1
set gPronde = 0
sendAllSprites(#cleanSprite)
puppetSound 1,0
puppetSound 2,0
global gVisibilidade
set gVisibilidade = []
repeat with i = 97 to 120
add gVisibilidade, the visibility of sprite i
set the visibility of sprite i to false
end repeat
go frame frameFilme
cursor -1
end